3.2.58 \(\int (f x)^m \log ^3(c (d+e x^2)^p) \, dx\) [158]

Optimal. Leaf size=77 \[ \frac {(f x)^{1+m} \log ^3\left (c \left (d+e x^2\right )^p\right )}{f (1+m)}-\frac {6 e p \text {Int}\left (\frac {(f x)^{2+m} \log ^2\left (c \left (d+e x^2\right )^p\right )}{d+e x^2},x\right )}{f^2 (1+m)} \]

[Out]

(f*x)^(1+m)*ln(c*(e*x^2+d)^p)^3/f/(1+m)-6*e*p*Unintegrable((f*x)^(2+m)*ln(c*(e*x^2+d)^p)^2/(e*x^2+d),x)/f^2/(1
+m)

________________________________________________________________________________________

Rubi [A]
time = 0.08, antiderivative size = 0, normalized size of antiderivative = 0.00, number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.000, Rules used = {} \begin {gather*} \int (f x)^m \log ^3\left (c \left (d+e x^2\right )^p\right ) \, dx \end {gather*}

Verification is not applicable to the result.

[In]

Int[(f*x)^m*Log[c*(d + e*x^2)^p]^3,x]

[Out]

((f*x)^(1 + m)*Log[c*(d + e*x^2)^p]^3)/(f*(1 + m)) - (6*e*p*Defer[Int][((f*x)^(2 + m)*Log[c*(d + e*x^2)^p]^2)/
(d + e*x^2), x])/(f^2*(1 + m))

Rubi steps

\begin {align*} \int (f x)^m \log ^3\left (c \left (d+e x^2\right )^p\right ) \, dx &=\frac {(f x)^{1+m} \log ^3\left (c \left (d+e x^2\right )^p\right )}{f (1+m)}-\frac {(6 e p) \int \frac {(f x)^{2+m} \log ^2\left (c \left (d+e x^2\right )^p\right )}{d+e x^2} \, dx}{f^2 (1+m)}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A] Leaf count is larger than twice the leaf count of optimal. \(994\) vs. \(2(77)=154\).
time = 1.43, size = 994, normalized size = 12.91 \begin {gather*} \frac {(f x)^m \left ((1+m) p^3 x^2 \log ^3\left (d+e x^2\right )+\frac {6 p^3 \left (-\frac {e x^2}{d}\right )^{\frac {1}{2}-\frac {m}{2}} \left (-\left ((1+m) \left (d+e x^2\right ) \, _4F_3\left (1,1,1,\frac {1}{2}-\frac {m}{2};2,2,2;1+\frac {e x^2}{d}\right )\right )+(1+m) \left (d+e x^2\right ) \, _3F_2\left (1,1,\frac {1}{2}-\frac {m}{2};2,2;1+\frac {e x^2}{d}\right ) \log \left (d+e x^2\right )+d \left (-1+\left (-\frac {e x^2}{d}\right )^{\frac {1+m}{2}}\right ) \log ^2\left (d+e x^2\right )\right )}{e}+\frac {6 d (1+m) p^3 \left (\frac {e x^2}{d+e x^2}\right )^{\frac {1}{2}-\frac {m}{2}} \left (8 \, _4F_3\left (\frac {1}{2}-\frac {m}{2},\frac {1}{2}-\frac {m}{2},\frac {1}{2}-\frac {m}{2},\frac {1}{2}-\frac {m}{2};\frac {3}{2}-\frac {m}{2},\frac {3}{2}-\frac {m}{2},\frac {3}{2}-\frac {m}{2};\frac {d}{d+e x^2}\right )+(-1+m) \log \left (d+e x^2\right ) \left (-4 \, _3F_2\left (\frac {1}{2}-\frac {m}{2},\frac {1}{2}-\frac {m}{2},\frac {1}{2}-\frac {m}{2};\frac {3}{2}-\frac {m}{2},\frac {3}{2}-\frac {m}{2};\frac {d}{d+e x^2}\right )+(-1+m) \, _2F_1\left (\frac {1}{2}-\frac {m}{2},\frac {1}{2}-\frac {m}{2};\frac {3}{2}-\frac {m}{2};\frac {d}{d+e x^2}\right ) \log \left (d+e x^2\right )\right )\right )}{e (-1+m)^3}-\frac {3 p^2 \left (-\frac {e x^2}{d}\right )^{\frac {1}{2}-\frac {m}{2}} \left (-\left ((1+m) \left (d+e x^2\right ) \, _4F_3\left (1,1,1,\frac {1}{2}-\frac {m}{2};2,2,2;1+\frac {e x^2}{d}\right )\right )+(1+m) \left (d+e x^2\right ) \, _3F_2\left (1,1,\frac {1}{2}-\frac {m}{2};2,2;1+\frac {e x^2}{d}\right ) \log \left (d+e x^2\right )+d \left (-1+\left (-\frac {e x^2}{d}\right )^{\frac {1+m}{2}}\right ) \log ^2\left (d+e x^2\right )\right ) \left (-p \log \left (d+e x^2\right )+\log \left (c \left (d+e x^2\right )^p\right )\right )}{e}-\frac {3 m p^2 \left (-\frac {e x^2}{d}\right )^{\frac {1}{2}-\frac {m}{2}} \left (-\left ((1+m) \left (d+e x^2\right ) \, _4F_3\left (1,1,1,\frac {1}{2}-\frac {m}{2};2,2,2;1+\frac {e x^2}{d}\right )\right )+(1+m) \left (d+e x^2\right ) \, _3F_2\left (1,1,\frac {1}{2}-\frac {m}{2};2,2;1+\frac {e x^2}{d}\right ) \log \left (d+e x^2\right )+d \left (-1+\left (-\frac {e x^2}{d}\right )^{\frac {1+m}{2}}\right ) \log ^2\left (d+e x^2\right )\right ) \left (-p \log \left (d+e x^2\right )+\log \left (c \left (d+e x^2\right )^p\right )\right )}{e}+\frac {3 p x^2 \left (-2 e x^2 \, _2F_1\left (1,\frac {3+m}{2};\frac {5+m}{2};-\frac {e x^2}{d}\right )+d (3+m) \log \left (d+e x^2\right )\right ) \left (-p \log \left (d+e x^2\right )+\log \left (c \left (d+e x^2\right )^p\right )\right )^2}{d (3+m)}+\frac {3 m p x^2 \left (-2 e x^2 \, _2F_1\left (1,\frac {3+m}{2};\frac {5+m}{2};-\frac {e x^2}{d}\right )+d (3+m) \log \left (d+e x^2\right )\right ) \left (-p \log \left (d+e x^2\right )+\log \left (c \left (d+e x^2\right )^p\right )\right )^2}{d (3+m)}+x^2 \left (-p \log \left (d+e x^2\right )+\log \left (c \left (d+e x^2\right )^p\right )\right )^3+m x^2 \left (-p \log \left (d+e x^2\right )+\log \left (c \left (d+e x^2\right )^p\right )\right )^3\right )}{(1+m)^2 x} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(f*x)^m*Log[c*(d + e*x^2)^p]^3,x]

[Out]

((f*x)^m*((1 + m)*p^3*x^2*Log[d + e*x^2]^3 + (6*p^3*(-((e*x^2)/d))^(1/2 - m/2)*(-((1 + m)*(d + e*x^2)*Hypergeo
metricPFQ[{1, 1, 1, 1/2 - m/2}, {2, 2, 2}, 1 + (e*x^2)/d]) + (1 + m)*(d + e*x^2)*HypergeometricPFQ[{1, 1, 1/2
- m/2}, {2, 2}, 1 + (e*x^2)/d]*Log[d + e*x^2] + d*(-1 + (-((e*x^2)/d))^((1 + m)/2))*Log[d + e*x^2]^2))/e + (6*
d*(1 + m)*p^3*((e*x^2)/(d + e*x^2))^(1/2 - m/2)*(8*HypergeometricPFQ[{1/2 - m/2, 1/2 - m/2, 1/2 - m/2, 1/2 - m
/2}, {3/2 - m/2, 3/2 - m/2, 3/2 - m/2}, d/(d + e*x^2)] + (-1 + m)*Log[d + e*x^2]*(-4*HypergeometricPFQ[{1/2 -
m/2, 1/2 - m/2, 1/2 - m/2}, {3/2 - m/2, 3/2 - m/2}, d/(d + e*x^2)] + (-1 + m)*Hypergeometric2F1[1/2 - m/2, 1/2
- m/2, 3/2 - m/2, d/(d + e*x^2)]*Log[d + e*x^2])))/(e*(-1 + m)^3) - (3*p^2*(-((e*x^2)/d))^(1/2 - m/2)*(-((1 +
m)*(d + e*x^2)*HypergeometricPFQ[{1, 1, 1, 1/2 - m/2}, {2, 2, 2}, 1 + (e*x^2)/d]) + (1 + m)*(d + e*x^2)*Hyper
geometricPFQ[{1, 1, 1/2 - m/2}, {2, 2}, 1 + (e*x^2)/d]*Log[d + e*x^2] + d*(-1 + (-((e*x^2)/d))^((1 + m)/2))*Lo
g[d + e*x^2]^2)*(-(p*Log[d + e*x^2]) + Log[c*(d + e*x^2)^p]))/e - (3*m*p^2*(-((e*x^2)/d))^(1/2 - m/2)*(-((1 +
m)*(d + e*x^2)*HypergeometricPFQ[{1, 1, 1, 1/2 - m/2}, {2, 2, 2}, 1 + (e*x^2)/d]) + (1 + m)*(d + e*x^2)*Hyperg
eometricPFQ[{1, 1, 1/2 - m/2}, {2, 2}, 1 + (e*x^2)/d]*Log[d + e*x^2] + d*(-1 + (-((e*x^2)/d))^((1 + m)/2))*Log
[d + e*x^2]^2)*(-(p*Log[d + e*x^2]) + Log[c*(d + e*x^2)^p]))/e + (3*p*x^2*(-2*e*x^2*Hypergeometric2F1[1, (3 +
m)/2, (5 + m)/2, -((e*x^2)/d)] + d*(3 + m)*Log[d + e*x^2])*(-(p*Log[d + e*x^2]) + Log[c*(d + e*x^2)^p])^2)/(d*
(3 + m)) + (3*m*p*x^2*(-2*e*x^2*Hypergeometric2F1[1, (3 + m)/2, (5 + m)/2, -((e*x^2)/d)] + d*(3 + m)*Log[d + e
*x^2])*(-(p*Log[d + e*x^2]) + Log[c*(d + e*x^2)^p])^2)/(d*(3 + m)) + x^2*(-(p*Log[d + e*x^2]) + Log[c*(d + e*x
^2)^p])^3 + m*x^2*(-(p*Log[d + e*x^2]) + Log[c*(d + e*x^2)^p])^3))/((1 + m)^2*x)

________________________________________________________________________________________

Maple [A]
time = 0.07, size = 0, normalized size = 0.00 \[\int \left (f x \right )^{m} \ln \left (c \left (e \,x^{2}+d \right )^{p}\right )^{3}\, dx\]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((f*x)^m*ln(c*(e*x^2+d)^p)^3,x)

[Out]

int((f*x)^m*ln(c*(e*x^2+d)^p)^3,x)

________________________________________________________________________________________

Maxima [A]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Failed to integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((f*x)^m*log(c*(e*x^2+d)^p)^3,x, algorithm="maxima")

[Out]

f^m*x*x^m*log((e*x^2 + d)^p)^3/(m + 1) + integrate((3*(d*f^m*(m + 1)*log(c) + (e*f^m*(m + 1)*log(c) - 2*e*f^m*
p)*x^2)*x^m*log((e*x^2 + d)^p)^2 + 3*(e*f^m*(m + 1)*x^2*log(c)^2 + d*f^m*(m + 1)*log(c)^2)*x^m*log((e*x^2 + d)
^p) + (e*f^m*(m + 1)*x^2*log(c)^3 + d*f^m*(m + 1)*log(c)^3)*x^m)/(e*(m + 1)*x^2 + d*(m + 1)), x)

________________________________________________________________________________________

Fricas [A]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((f*x)^m*log(c*(e*x^2+d)^p)^3,x, algorithm="fricas")

[Out]

integral((f*x)^m*log((x^2*e + d)^p*c)^3, x)

________________________________________________________________________________________

Sympy [A]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \left (f x\right )^{m} \log {\left (c \left (d + e x^{2}\right )^{p} \right )}^{3}\, dx \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((f*x)**m*ln(c*(e*x**2+d)**p)**3,x)

[Out]

Integral((f*x)**m*log(c*(d + e*x**2)**p)**3, x)

________________________________________________________________________________________

Giac [A]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((f*x)^m*log(c*(e*x^2+d)^p)^3,x, algorithm="giac")

[Out]

integrate((f*x)^m*log((x^2*e + d)^p*c)^3, x)

________________________________________________________________________________________

Mupad [A]
time = 0.00, size = -1, normalized size = -0.01 \begin {gather*} \int {\ln \left (c\,{\left (e\,x^2+d\right )}^p\right )}^3\,{\left (f\,x\right )}^m \,d x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(log(c*(d + e*x^2)^p)^3*(f*x)^m,x)

[Out]

int(log(c*(d + e*x^2)^p)^3*(f*x)^m, x)

________________________________________________________________________________________